home *** CD-ROM | disk | FTP | other *** search
/ EDUCORP 8 / Educorp2Compilation.sit / educorp2 / Programming (2300, 7000) / 2309 Programming v.7 / Jeff Interpreter / Source Files / Function.Pas < prev    next >
MacBinary  |  1986-12-08  |  768 b   |  [TEXT/PASC]
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: Function.Pas

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert TheDraw Pascal screen Image (image/theDrawPascalScreenImage) ext Unsupported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Mon Dec 8 11:32:42 1986, modified Mon Dec 8 11:32:42 1986, creator 'PASC', type ASCII, 198 bytes "Function.Pas" , at 0x146 352 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[PASC]


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0c 46 75 6e 63 74 69 | 6f 6e 2e 50 61 73 00 00 |..Functi|on.Pas..|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 50 41 53 | 43 01 00 00 00 00 00 00 |.TEXTPAS|C.......|
|00000050| 00 00 00 00 00 00 c6 00 | 00 01 60 9c 00 a6 aa 9c |........|..`.....|
|00000060| 00 a6 aa 00 00 06 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 56 2c 00 00 |........|....V,..|
|00000080| 70 72 6f 67 72 61 6d 20 | 50 52 4f 47 33 3b 0d 0d |program |PROG3;..|
|00000090| 20 76 61 72 0d 20 20 41 | 2c 20 42 20 3a 20 49 6e | var.  A|, B : In|
|000000a0| 74 65 67 65 72 3b 0d 0d | 20 66 75 6e 63 74 69 6f |teger;..| functio|
|000000b0| 6e 20 46 20 28 58 20 3a | 20 49 6e 74 65 67 65 72 |n F (X :| Integer|
|000000c0| 29 20 3a 20 49 6e 74 65 | 67 65 72 3b 0d 0d 20 62 |) : Inte|ger;.. b|
|000000d0| 65 67 69 6e 20 28 2a 20 | 64 75 6d 70 31 20 2a 29 |egin (* |dump1 *)|
|000000e0| 0d 20 20 46 20 3a 3d 20 | 58 20 2a 20 58 3b 20 20 |.  F := |X * X;  |
|000000f0| 28 2a 20 64 75 6d 70 32 | 20 2a 29 0d 20 65 6e 64 |(* dump2| *). end|
|00000100| 3b 20 28 2a 20 46 20 2a | 29 0d 0d 62 65 67 69 6e |; (* F *|)..begin|
|00000110| 0d 20 41 20 3a 3d 20 35 | 3b 0d 20 42 20 3a 3d 20 |. A := 5|;. B := |
|00000120| 46 28 46 28 41 29 29 3b | 0d 20 57 52 49 54 45 4c |F(F(A));|. WRITEL|
|00000130| 4e 28 42 29 3b 0d 65 6e | 64 2e 20 28 2a 20 50 52 |N(B);.en|d. (* PR|
|00000140| 4f 47 33 20 2a 29 00 00 | 00 00 00 00 00 00 00 00 |OG3 *)..|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 01 00 00 00 01 2e | 00 00 00 2e 00 00 00 32 |........|.......2|
|00000190| 38 13 91 3a 13 b1 3c 13 | d1 3e 13 f1 40 14 11 42 |8..:..<.|.>..@..B|
|000001a0| 14 31 44 14 51 46 14 71 | 48 14 91 4a 14 b1 4c 14 |.1D.QF.q|H..J..L.|
|000001b0| 0c 46 75 6e 63 74 69 6f | 6e 2e 50 61 73 b3 02 00 |.Functio|n.Pas...|
|000001c0| 00 00 54 45 58 54 50 41 | 53 43 01 06 00 00 01 00 |..TEXTPA|SC......|
|000001d0| 00 00 54 45 58 54 50 41 | 53 43 01 06 00 00 01 00 |..TEXTPA|SC......|
|000001e0| 00 00 00 84 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 a0 8b 57 13 00 00 | 00 c6 00 00 01 60 11 82 |....W...|.....`..|
|00000200| 18 31 84 18 51 86 18 71 | 88 18 91 8a 18 b1 8c 18 |.1..Q..q|........|
|00000210| d1 8e 18 f1 90 19 11 92 | 19 31 94 19 51 96 19 71 |........|.1..Q..q|
|00000220| 98 19 91 9a 19 b1 9c 19 | d1 9e 19 f1 a0 1a 11 a2 |........|........|
|00000230| 1a 31 a4 1a 51 a6 1a 71 | a8 1a 91 aa 1a b1 ac 1a |.1..Q..q|........|
|00000240| d1 ae 1a f1 b0 1b 11 b2 | 1b 31 b4 1b 51 b6 1b 71 |........|.1..Q..q|
|00000250| b8 1b 91 ba 1b b1 bc 1b | d1 be 1b f1 c0 1c 11 c2 |........|........|
|00000260| 1c 31 c4 1c 51 c6 1c 71 | c8 1c 91 ca 1c b1 cc 1c |.1..Q..q|........|
|00000270| d1 ce 1c f1 d0 1d 11 d2 | 1d 31 d4 1d 51 d6 1d 71 |........|.1..Q..q|
|00000280| 00 00 00 2a 00 04 00 09 | 00 04 00 09 00 28 00 03 |...*....|.....(..|
|00000290| 01 46 01 19 00 28 01 19 | 00 6b 01 f2 00 7c 01 25 |.F...(..|.k...|.%|
|000002a0| 01 53 01 fc 01 01 01 00 | 00 08 00 10 13 88 00 00 |.S......|........|
|000002b0| 01 00 00 00 01 2e 00 00 | 00 2e 00 00 00 32 00 00 |........|.....2..|
|000002c0| eb 4c 01 d8 00 00 00 1c | 00 32 00 00 44 43 46 47 |.L......|.2..DCFG|
|000002d0| 00 00 00 0a 00 01 ff ff | 00 00 00 00 00 00 e9 8c |........|........|
|000002e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+